home *** CD-ROM | disk | FTP | other *** search
/ The Games Machine 76 / XENIATGM66.iso / Indiana Jones / Indiana Jones.exe / RESOURCE / PREVIEW.GOB / cog_sea_deck_ai.cog < prev    next >
Text File  |  1999-11-15  |  15KB  |  447 lines
  1. # Jones 3D Cog Script
  2. #
  3. # SEA_Deck_AI.cog
  4. # 
  5. # Management of the Sailor patrol patterns and population on the surface deck of the Pudovkin
  6. #
  7. #
  8. # [JM]
  9. #
  10. # (C) 1999 LucasArts Entertainment Company LLC. All Rights Reserved
  11. #
  12. # ========================================================================================
  13. # ========================================================================================
  14. Symbols
  15.  
  16. message         startup
  17. message         entered
  18. message         killed
  19. message         timer
  20. #message         taken
  21. message         user0          
  22. message         user1
  23. message         user2
  24. message         user3
  25.  
  26. #=================================== SUBROUTINES ========================================
  27. flex            NewSailor               local
  28. flex            RandomSailorPicker      local
  29. flex            GhostPicker             local
  30. flex            InstinctManager         local
  31. flex            SailorCacheCheck        local
  32. flex            DisableAIForCutscene    local
  33. flex            EnableAIAfterCutscene   local
  34.  
  35. #========== SAILORS ON DECK.  ALSO USED FOR CREATION OF REPLACEMENT SAILORS==============
  36.  
  37. thing           DeckSailor00     LinkID=1
  38. thing           DeckSailor01     LinkID=1
  39. thing           DeckSailor02     LinkID=1
  40. thing           DeckSailor03     LinkID=1  #One sailor Standing Guard at the start, i.e. not roaming
  41.  
  42. #============== GHOST OBJECTS FOR THE CREATION OF NEW SAILORS============================
  43. thing           GhostSailor00    
  44. thing           GhostSailor01    
  45. thing           GhostSailor02    
  46.  
  47. #======================= ADJOIN TRIGGERS =============================
  48.  
  49. surface         Begin           #Start the maddness
  50.  
  51. #surface         BridgeCutsceneOn    mask=0x404
  52. #surface         BridgeCutsceneOff   #mask=0x404
  53.  
  54. #thing           CrankWheel
  55. #thing           DingyWinch
  56.  
  57. #=========================== MISC LOCAL VARIABLES =======================================
  58.  
  59. int             counter                     local
  60. int             counter2                    local
  61. int             StartCheck=0                local
  62. int             SailorGrowthCounter=0       local
  63.  
  64. int             IndyNearestwpnt             local
  65. int             GhostSailorNum              local
  66.  
  67.     # Random number variables for making new commies
  68. int             SailorRand                  local
  69. int             SailorRandCheck=-1          local
  70. int             VoiceRand                   local
  71. int             VoiceRandCheck=-1           local
  72.  
  73. int             UpperGridOn=-1              local
  74.  
  75. int             NumSailorsInCache=0         local
  76.  
  77. int             IndyHasTheCrank=0           local
  78.  
  79. int             CutsceneStatus=0            local
  80.  
  81. thing           TempSailor                  local
  82.  
  83. # ================================= CONSTANTS ===========================================
  84.                 
  85. int             SAILOR_MAKER_CAP=6              local
  86. int             STARTING_SAILORS=4              local
  87. int             VARIETY_OF_COMMIES=3            local
  88. int             VARIETY_OF_VOICES=5             local
  89. int             TIMER_ID_CREATE_SAILOR          local
  90.  
  91. int             FLEE_TO_WPNT=0                  local
  92.  
  93. flex            NEW_SAILOR_DELAY=32.0                   local
  94. flex            MIN_COMMIE_CREATION_SEPARATION=20.0    local
  95. flex            PrevCommieCreationTime                local
  96.  
  97. # ============================ COMMIE TEMPLATES =========================================
  98.                                 
  99. template        TokarevTPL00=Sailor_Tokarev     local
  100. template        TokarevTPL01=Sailor_Tokarev2    local
  101. template        TokarevTPL02=Sailor_Tokarev3    local
  102. template        TokarevTPL03=Sailor_Tokarev4    local
  103. template        TokarevTPL04=Sailor_Tokarev5    local
  104.  
  105. template        SimonovTPL00=Sailor_Simonov     local
  106. template        SimonovTPL01=Sailor_Simonov2    local
  107. template        SimonovTPL02=Sailor_Simonov3    local
  108. template        SimonovTPL03=Sailor_Simonov4    local
  109. template        SimonovTPL04=Sailor_Simonov5    local
  110.  
  111. template        MauserTPL00=Sailor_Mauser       local
  112. template        MauserTPL01=Sailor_Mauser2      local
  113. template        MauserTPL02=Sailor_Mauser3      local
  114. template        MauserTPL03=Sailor_Mauser4      local
  115. template        MauserTPL04=Sailor_Mauser5      local
  116.  
  117.  
  118. end
  119.  
  120. # ========================================================================================
  121. # ========================================= CODE =========================================
  122. # ========================================================================================
  123.  
  124. code
  125.  
  126. # ========================================================================================
  127. startup:
  128.  
  129.     for(counter = 0; counter < STARTING_SAILORS; counter = counter + 1)
  130.     {   
  131.         AISetCutsceneMode(DeckSailor00[counter]);  #  Start all of the sailors in cutscene mode.  Their patrols trigger when Idny gets on deck
  132.         SetThingFlags(DeckSailor00[counter], 0x80000);
  133.     }
  134.     
  135.     
  136.     return;
  137.     
  138. # ========================================================================================
  139. entered:
  140.     
  141.     if(GetSenderRef() == Begin) #Do this once, only once, and nothing else until then
  142.     {
  143.         if(StartCheck != 0) return;
  144.         
  145.         StartCheck = 1;
  146.  
  147.         for(counter = 0; counter < STARTING_SAILORS; counter = counter + 1)
  148.         {
  149.             ClearThingFlags(DeckSailor00[counter], 0x80000);   
  150.             AIClearCutsceneMode(DeckSailor00[counter]);
  151.         
  152.             AISetInstinctWpntMode(DeckSailor00[counter]);
  153.         
  154.             if(counter < 2) // Only set two of the Commies roaming at the start
  155.             {
  156.                 AIEnableInstinct(DeckSailor00[counter], "roam", 1);
  157.             }
  158.         }
  159.     }
  160.     
  161. //    else if(GetSenderRef() == BridgeCutsceneOn && CutsceneStatus == 0)
  162. //    {
  163. //        DebugPrint("DisablingAI for cutscene");
  164. //        CutsceneStatus = 1;  //Cutscene is in the process of playing
  165. //        Call DisableAIForCutscene;
  166. //    }
  167.     
  168. //    else if(GetSenderRef() == BridgeCutsceneOff && CutsceneStatus == 1)
  169. //    {
  170. //        DebugPrint("EnablingAI after Cutscene");
  171.         
  172. //        Call EnableAIAfterCutscene;
  173. //        CutsceneStatus = 2;  //Cutscene has played and won't play again
  174. //        Call SailorCacheCheck;
  175. //    }                                                                  
  176.     
  177.     return;
  178.  
  179. # ========================================================================================
  180. killed:
  181.  
  182.     TempSailor = GetSenderRef();
  183.     for (counter = 0; counter < STARTING_SAILORS; counter = counter + 1)
  184.     {
  185.         if (DeckSailor00[counter] == TempSailor) #locate exactly which sailor died and prepare to make a new one
  186.         {            
  187.             DeckSailor00[counter] = -1;
  188.         }
  189.     }
  190.     
  191.     SetTimerEx(NEW_SAILOR_DELAY, TIMER_ID_CREATE_SAILOR, 0, 0);  #Small delay before making a new sailor      
  192.     
  193.     return;
  194.     
  195. # ========================================================================================
  196. timer:
  197.     
  198.     if(GetSenderID() == TIMER_ID_CREATE_SAILOR) #From the SetTimerEx in the killed message
  199.     {
  200.         Call NewSailor;
  201.     }    
  202.                        
  203.     return;
  204.  
  205. # ========================================================================================
  206. //taken:
  207.  
  208. //    if(IndyHasTheCrank == 1) return;
  209.     
  210. //    if(GetSenderRef() == CrankWheel)
  211. //    {
  212. //        IndyHasTheCrank = 1;
  213. //    }
  214.     
  215. //    return;
  216.  
  217. # ========================================================================================
  218. //Expects SEA_Grid.cog to send a message when it swaps out grids... only param(0) is being used for now
  219. User0:
  220.  
  221.     UpperGridOn = GetParam(0);
  222.     
  223.     if(StartCheck == 0) return; // Nothing will happen until the initial entered message above is recieved
  224.     Call InstinctManager;
  225.     Call SailorCacheCheck; //See if any Sailors were added to the cache while the Uper Grid was off
  226.  
  227.     return;
  228.     
  229. # ========================================================================================
  230. user1:
  231.     
  232.     Sleep(1.0);
  233.     
  234.     for(counter = 0; counter < STARTING_SAILORS; counter = counter + 1)
  235.     {
  236.         //Make the commies run away so that when Indy solves the final puzzle they aren't just standing on camera doing nothing
  237.         if(DeckSailor00[counter] != -1)
  238.         {
  239.             SetThingFlags(DeckSailor00[counter], 0x80000); //Fleeing didn't work so well, just disabling them
  240.             
  241.         //AISetSubMode(DeckSailor00[counter], 0x8000); // SITHAI_SUBMODECONTINUOUSWPNTMOTION. Required for FleeToWpnt
  242.         //AIFleeToWpnt(Decksailor00[counter], FLEE_TO_WPNT);               
  243.         }
  244.     }
  245.     
  246.     return;
  247.  
  248. # ========================================================================
  249. user2:
  250.  
  251.     Call DisableAIForCutscene;
  252.  
  253.     return;
  254.     
  255. # ========================================================================
  256. user3:
  257.  
  258.     Call EnableAIAfterCutscene;
  259.  
  260.     return;    
  261.             
  262. # ========================================================================
  263. #                           -==SUBROUTINES==-
  264. # ========================================================================
  265. //  Expects a dead sailor with its value set to -1
  266. //  Creates a new random sailor to replace any killed on the deck
  267. //  Ghost Objects will be checked for LOS to the player
  268. NewSailor:
  269.     
  270.     if(SailorGrowthCounter >= SAILOR_MAKER_CAP) #Check to see if any more sailors are allowed to be made
  271.     {
  272.         return;
  273.     }
  274.     
  275.     if(UpperGridOn == 0 || CutsceneStatus == 1)
  276.     {
  277.         NumSailorsInCache = NumSailorsInCache + 1;
  278.         return;
  279.     }    
  280.     
  281.     if(GetFlexGameTime() - PrevCommieCreationTime < MIN_COMMIE_CREATION_SEPARATION)
  282.     {
  283.         SetTimerEx(MIN_COMMIE_CREATION_SEPARATION, TIMER_ID_CREATE_SAILOR, 0, 0); 
  284.         return;
  285.     }
  286.     
  287.     for(counter = 0; counter < (STARTING_SAILORS  - 1); counter = counter + 1)  #Only keep Regenerating three of the Sailors, Hence the -1.
  288.     {
  289.         if(DeckSailor00[counter] == -1)
  290.         {
  291.             Call GhostPicker;
  292.             Call RandomSailorPicker;
  293.             
  294.             if(SailorRand == 0)
  295.             {
  296.                 DeckSailor00[counter] = CreateThing(TokarevTPL00[VoiceRand], GhostSailor00[GhostSailorNum]);
  297.             }
  298.             else if(SailorRand == 1)
  299.             {
  300.                 DeckSailor00[counter] = CreateThing(SimonovTPL00[VoiceRand], GhostSailor00[GhostSailorNum]);
  301.             }
  302.             else
  303.             {
  304.                 DeckSailor00[counter] = CreateThing(MauserTPL00[VoiceRand], GhostSailor00[GhostSailorNum]);
  305.             }
  306.             
  307.             if (DeckSailor00[counter] == -1)
  308.             {
  309.                 SetTimerEx(10.0, TIMER_ID_CREATE_SAILOR, 0, 0);  
  310.             return;
  311.             }
  312.             
  313.             SailorGrowthCounter = SailorGrowthCounter + 1;
  314.             
  315.             PrevCommieCreationTime = GetFlexGameTime();
  316.             
  317.             CaptureThing(DeckSailor00[counter]);
  318.             
  319.             AISetInstinctWpntMode(DeckSailor00[counter]);
  320.             
  321.             AIEnableInstinct(DeckSailor00[counter], "roam", 1);
  322.             
  323.             if(RandBetween(0, 2) < 2)
  324.             {
  325.                 AIWpntHuntTarget(DeckSailor00[counter], 1.6, 0.0);
  326.             }
  327.             
  328.             return;
  329.         }
  330.     }
  331.     return;
  332.    
  333. # ========================================================================================
  334. //Finds one of a set number of Ghost Objects for creating a new Sailor
  335. //If Indy is near a defined group of waypoints new commie wil always be created at a specific ghost object
  336. GhostPicker:    
  337.     
  338.     IndyNearestWpnt = AIFindNearestWpnt(GetLocalPlayerThing()); #finds nearest waypoint to the player
  339.     
  340.     if(IndyNearestwpnt <= 7)
  341.     {
  342.         GhostSailorNum = 1;
  343.     }
  344.     else if(IndyNearestWpnt <= 15)
  345.     {
  346.         GhostSailorNum = 2;
  347.     }
  348.     else if(IndyNearestWpnt <= 25 )
  349.     {
  350.         GhostSailorNum = 0;
  351.     }
  352.     
  353.     return;
  354.     
  355. # ========================================================================================
  356. // Picks a Commie from bank of templates and then picks one of the 5 vocal interations of that commie
  357. // makes sure that new sailor is not the same type or voice as any previously generated sailor
  358. RandomSailorPicker:
  359.     
  360.     SailorRand = RandBetween(0, VARIETY_OF_COMMIES-1);  #Randomly choose from one of three templates
  361.     while(SailorRand == SailorRandCheck)
  362.     {
  363.         SailorRand = RandBetween(0, VARIETY_OF_COMMIES-1);
  364.     }    
  365.     SailorRandCheck = SailorRand;
  366.     
  367.     VoiceRand = RandBetween(0, VARIETY_OF_VOICES-1);    #Randomly choose one of the 5 voice iterations of the sailors
  368.     while(VoiceRand == VoiceRandCheck)
  369.     {
  370.         VoiceRand = RandBetween(0, VARIETY_OF_VOICES-1);
  371.     }
  372.     VoiceRandCheck = VoiceRand;
  373.  
  374.     return;
  375.  
  376. # ========================================================================================
  377. //Expects UpperGridOn to be defined by the User0 message.
  378. //Sets cutscene mode on and off when the Deck Grid is turned on and off by SEA_Grid.cog
  379. InstinctManager:
  380.     
  381.     if(UpperGridOn == 0)
  382.     {
  383.         for(counter = 0; counter < STARTING_SAILORS; counter = counter +1)
  384.         {   
  385.             if(DeckSailor00[counter] != -1)
  386.             {
  387.                 AIClearInstinctWpntMode(DeckSailor00[counter]);
  388.                 AISetCutsceneMode(DeckSailor00[counter]);
  389.             }
  390.         }
  391.     }
  392.     else
  393.     {
  394.         for(counter = 0; counter < STARTING_SAILORS; counter = counter + 1)
  395.         {
  396.             if(DeckSailor00[counter] != -1)
  397.             {
  398.                 AIClearCutsceneMode(DeckSailor00[counter]);
  399.                 AISetInstinctWpntMode(DeckSailor00[counter]);
  400.             }
  401.         }
  402.     }
  403.             
  404.     return;
  405.  
  406. # ========================================================================================
  407. //Checks to see if there are any Sailors that had to be put in the Cache because the Upper Grid was off
  408. //Then Makes that many new Sailors
  409. SailorCacheCheck:
  410.     
  411.     if(NumSailorsInCache == 0) return;
  412.     
  413.     while(NumSailorsInCache != 0)
  414.     {
  415.         NumSailorsInCache = NumSailorsInCache - 1;
  416.         Call NewSailor;
  417.     }
  418.     return;
  419.  
  420. # ========================================================================================
  421. DisableAIForCutscene:
  422.  
  423.     for(counter = 0; counter < STARTING_SAILORS; counter = counter + 1)
  424.     {
  425.         if(DeckSailor00[counter] != -1) 
  426.         {
  427.             AISetCutsceneMode(DeckSailor00[counter]);
  428.         }
  429.     }                                                 
  430.     
  431.     return;
  432. # ========================================================================================
  433. EnableAIAfterCutscene:
  434.  
  435.     for(counter = 0; counter < STARTING_SAILORS; counter = counter + 1)
  436.     {
  437.         if(DeckSailor00[counter] != -1)
  438.         {
  439.             AIClearCutsceneMode(DeckSailor00[counter]);
  440.         }
  441.     }
  442.  
  443.     return;
  444.  
  445. # ========================================================================================
  446. end
  447.